Holt Researcher: American History/Holt Researcher: American History.iso/pc/modules/tour.dxr/00344.ls

Text File | 2000-01-21 | 615 b | 25 lines

on exitFrame
  global firstTime, notClicked, gMenuButton, gMenuExit, gPlaySound, gTourForwardArrow, gTourBackArrow, goQuick, gTiming, audioPath, gCurrLabel
  if the frameLabel <> 0 then
    gCurrLabel = the frameLabel
  end if
  if gPlaySound then
    soundFile = getAudioFile(the frame)
    sound playFile 1, audioPath & soundFile & ".AIF"
    gPlaySound = 0
  end if
  if soundBusy(1) then
    go(the frame)
  else
    gTiming = 1
    go(the frame + 1)
  end if
  repeat with rc in [gMenuButton, gMenuExit, gTourForwardArrow, gTourBackArrow]
    doRollover(rc)
  end repeat
end

on mouseUp
  Interaction448()
end